﻿Imports extranet.BE
Imports extranet.BC

Partial Public Class comum_WebUserControl
    Inherits System.Web.UI.UserControl

    Public WriteOnly Property CPF() As String
        Set(ByVal value As String)
            hfCPF.Value = value
        End Set
    End Property

    Public WriteOnly Property IdRanking() As String
        Set(ByVal value As String)
            hfIdRanking.Value = value
        End Set
    End Property

    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim objBERankeado As New BERankeado

        objBERankeado.CPF = hfCPF.Value
        objBERankeado.IdRanking = hfIdRanking.Value



    End Sub

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub
End Class
